#pragma once

#include <iostream>
#include <memory>
#include <ctime>
#include <cassert>
#include <sstream>
#include <vector>
#include "level.hpp"
#include "message.hpp"

namespace jiuqilog
{
    // 设计一个格式化子项基类
    class FormatItem
    {
    public:
        using ptr = std::shared_ptr<FormatItem>;
        virtual void format(std::ostream &out, const LogMsg &msg) = 0;
    };

    // 子类:消息,等级,时间,文件名,行号,线程ID,日志器名,制表符,换行符,其他字符
    class MsgFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << msg._payload;
        }
    };

    class LevelFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << LogLevel::toString(msg._level);
        }
    };

    class TimeFormatItem : public FormatItem
    {
    public:
        TimeFormatItem(const std::string time_fmt = "%H:%M:%S") : _time_fmt(time_fmt)
        {
        }
        void format(std::ostream &out, const LogMsg &msg)
        {
            struct tm t;
            localtime_r(&msg._ctime, &t);
            char tmp[32] = {0};
            strftime(tmp, 31, _time_fmt.c_str(), &t);
            out << tmp;
        }

    private:
        std::string _time_fmt;
    };

    class FileFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << msg._file;
        }
    };

    class LineFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << msg._line;
        }
    };

    class ThreadFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << msg._tid;
        }
    };

    class LoggerFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << msg._logger;
        }
    };

    class TabFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << "\t";
        }
    };

    class NLineFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << "\n";
        }
    };

    class OtherFormatItem : public FormatItem
    {
    public:
        OtherFormatItem(const std::string &str) : _str(str) {}
        void format(std::ostream &out, const LogMsg &msg)
        {
            out << _str;
        }

    private:
        std::string _str;
    };

    class Formatter
    {
    public:
        using ptr = std::shared_ptr<Formatter>;
        Formatter(const std::string pattern = "[%d{%H:%M:%S}][%t][%p][%c][%f:%l]%T%m%n")
            : _pattern(pattern)
        {
            assert(parsePattern());
        }

        // 对msg进行格式化
        void format(std::ostream &out, const LogMsg &msg)
        {
            for (auto &item : _items)
            {
                item->format(out, msg);
            }
        }
        std::string format(const LogMsg &msg)
        {
            std::stringstream ss;
            for (auto &item : _items)
            {
                item->format(ss, msg);
            }
            return ss.str();
        }

    private:
        // 解析格式化规则字符串
        bool parsePattern()
        {
            // 没有以%起始的字符串都是原始字符串
            //%后如果是%,那么就是%字符,否则代表的是格式化字符
            // 如果是格式化字符,判断后面有没有{,如果有,则{后的就是格式化字符子格式
            std::vector<std::pair<std::string, std::string>> fmt_order;
            int pos = 0;
            std::string key, val;
            int len = _pattern.size();
            while (pos < len)
            {
                // 判断是否是%, 不是就是原始字符
                if (_pattern[pos] != '%')
                {
                    val.push_back(_pattern[pos++]);
                    continue;
                }
                // 能走下来就是%, %%代表一个%原始字符
                if (pos + 1 < len && _pattern[pos + 1] == '%')
                {
                    val.push_back('%');
                    pos += 2;
                    continue;
                }
                // 能走下来说明是格式化字符
                // 首先如果之前存在其他字符,先保存起来
                if (!val.empty())
                {
                    fmt_order.push_back(std::make_pair("", val));
                    val.clear();
                }

                // 处理格式化字符
                pos += 1;
                if (pos == len)
                {
                    std::cerr << "%之后没有对应格式化字符" << std::endl;
                    return false;
                }
                key = _pattern[pos];
                pos += 1;
                // 判断是否有子规则
                if (pos < len && _pattern[pos] == '{')
                {
                    pos += 1;
                    while (pos < len && _pattern[pos] != '}')
                    {
                        val.push_back(_pattern[pos++]);
                    }
                    if (pos == len)
                    {
                        std::cerr << "子规则{}匹配失败" << std::endl;
                        return false;
                    } // 意为{}不成对出现,我们这里认为是错误
                    pos += 1; // 跳过}
                }
                fmt_order.push_back(std::make_pair(key, val));
                // 注意清空key与val
                key.clear();
                val.clear();
            }
            // 如果最后还有未处理的其他字符,需要保存起来
            if (!val.empty())
            {
                fmt_order.push_back(std::make_pair("", val));
                val.clear();
            }
            for (auto &it : fmt_order)
            {
                // std::cout << "Key: '" << it.first << "', Value: '" << it.second << "'" << std::endl;
                _items.push_back(createItem(it.first, it.second));
            }
            return true;
        }

    private:
        // 根据不同的格式化字符创建不同的格式化子项对象
        /*
            %d 表示日期 包含子格式 {%H:%M:%S}
            %t 表示线程ID
            %p 表示日志等级
            %c 表示日志器名称
            %f 表示源码文件名
            %l 表示源码行号
            %T 表示制表符
            %m 表示主体消息
            %n 表示换行
        */
        FormatItem::ptr createItem(const std::string &key, const std::string &val)
        {
            if (key == "d")
            {
                if (val.empty())
                    return std::make_shared<TimeFormatItem>();
                return std::make_shared<TimeFormatItem>(val);
            }
            if (key == "t")
                return std::make_shared<ThreadFormatItem>();
            if (key == "p")
                return std::make_shared<LevelFormatItem>();
            if (key == "c")
                return std::make_shared<LoggerFormatItem>();
            if (key == "f")
                return std::make_shared<FileFormatItem>();
            if (key == "l")
                return std::make_shared<LineFormatItem>();
            if (key == "T")
                return std::make_shared<TabFormatItem>();
            if (key == "m")
                return std::make_shared<MsgFormatItem>();
            if (key == "n")
                return std::make_shared<NLineFormatItem>();
            if (key == "")
                return std::make_shared<OtherFormatItem>(val);
            std::cerr << "没有对应的格式化字符" << key << std::endl;
            abort();
            return FormatItem::ptr();
        }

    private:
        std::string _pattern; // 格式化规则字符串
        std::vector<FormatItem::ptr> _items;
    };
}